USE [Bases2]
GO
/****** Object:  StoredProcedure [dbo].[EliminarTipoCliente]    Script Date: 11/02/2011 21:26:42 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[EliminarTipoCliente]
    @Id_Tipo int   
AS 
BEGIN
	SET NOCOUNT ON
	BEGIN TRANSACTION
	DECLARE @Contador int
	SET @Contador=0        
    
    SELECT @Contador=COUNT(1)
    FROM CLIENTE WHERE id_tipo_cliente=@Id_Tipo
    
    IF @Contador>0
    BEGIN
		SELECT 'No es posible eliminar este tipo de cliente pues existen clientes asignados a él.'
	END
	ELSE
	BEGIN
		DELETE FROM TIPO_CLIENTE WHERE id_tipo_cliente=@Id_Tipo		
		SELECT 'Tipo de cliente eliminado correctamente.'
	END	
	COMMIT
	SET NOCOUNT OFF
END
